package com.basic.library.utils;

import android.text.Editable;
import android.text.InputFilter;
import android.text.Spanned;
import android.text.TextUtils;
import android.text.TextWatcher;
import android.widget.EditText;

import com.basic.library.R;
import com.basic.library.utils.toast.ToastCompat;

import java.math.BigDecimal;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

/**
 * @author yj
 * @description
 */
public class EditInputFilter implements InputFilter {

    /**
     * 最大数字
     */
    public String MAX_VALUE = "99999999";

    public void setMAX_VALUE(String MAX_VALUE) {
        this.MAX_VALUE = MAX_VALUE;
    }

    /**
     * 小数点后的数字的位数
     */
    public static final int POINTER_LENGTH = 2;

    private static final String POINTER = ".";

    String text = "";

    Pattern p;

    public EditInputFilter(EditText editText) {
        //用于匹配输入的是0-9  .  这几个数字和字符
        p = Pattern.compile("([0-9]|\\.)*");
        editText.setFilters(new InputFilter[]{this});
        editText.addTextChangedListener(new TextWatcher() {
            @Override
            public void beforeTextChanged(CharSequence charSequence, int i, int i1, int i2) {

            }

            @Override
            public void onTextChanged(CharSequence charSequence, int i, int i1, int i2) {
//                System.out.println(i + "-" + i1 + "-" + i2);
                String now = charSequence.toString();
                if (!now.isEmpty()) {
                    BigDecimal decimal = new BigDecimal("0").add(new BigDecimal(now));
                    String value = decimal.toString();
                    if (text.contains(".") && !now.contains(".")) {
//                        System.out.println(text + "-*****-" + value + "-*****-" + now);
                        if (text.replace(now, "").equals(".")) {
                            text = now;
                            editText.setText(value);
                        } else if (decimal.compareTo(new BigDecimal(MAX_VALUE)) > 0) {
                            ToastCompat.show("金额超出限制！");
                            editText.setText(text);
                        } else {
                            text = now;
//                            editText.setText(value);
                        }
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                    if (now.length() > 1 && now.charAt(0) == '0' && now.charAt(1) != '.') {
                        text = now;
                        editText.setText(value);
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                    if (now.contains(".") && now.length() - now.indexOf(".") > 3) {
                        text = new BigDecimal(now).setScale(2, BigDecimal.ROUND_DOWN).toString();
                        editText.setText(text);
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                }
                text = charSequence.toString();
            }

            @Override
            public void afterTextChanged(Editable editable) {

            }
        });
    }

    /**
     * source    新输入的字符串
     * start    新输入的字符串起始下标，一般为0
     * end    新输入的字符串终点下标，一般为source长度-1
     * dest    输入之前文本框内容
     * dstart    原内容起始坐标，一般为0
     * dend    原内容终点坐标，一般为dest长度-1
     */

    @Override
    public CharSequence filter(CharSequence source, int start, int end,
                               Spanned dest, int dstart, int dend) {
        String sourceText = source.toString();
        String destText = dest.toString();
//验证删除等按键
        if (TextUtils.isEmpty(sourceText)) {
            if (dstart == 0 && destText.indexOf(POINTER) == 1) {//保证小数点不在第一个位置
                return "0";
            }
            return "";
        }
        Matcher matcher = p.matcher(source);
        //已经输入小数点的情况下，只能输入数字
        if (destText.contains(POINTER)) {
            if (!matcher.matches()) {
                return "";
            } else {
                if (POINTER.equals(source)) { //只能输入一个小数点
                    return "";
                }
            }
            //验证小数点精度，保证小数点后只能输入两位
            int index = destText.indexOf(POINTER);
            int length = destText.trim().length() - index;
            if (length > POINTER_LENGTH && dstart > index) {
                return "";
            }
        } else {
            //没有输入小数点的情况下，只能输入小数点和数字，但首位不能输入小数点和0
            if (!matcher.matches()) {
                return "";
            } else {
                if ((POINTER.equals(source)) && dstart == 0) {//第一个位置输入小数点的情况
                    return "0.";
                } else if ("0".equals(source) && dstart == 0) {
                    return "0";
                }
            }
        }
//        dstart
        //修复当光标定位到第一位的时候 还能输入其他的    这个是为了修复以下的情况
        /**
         * <>
         *     当如下情况的时候  也就是 已经输入了23.45   这个时候限制是500元
         *     那么这个时候如果把光标移动2前面  也就是第0位  在输入一个5  那么这个实际的参与下面的
         *     判断的sumText > MAX_VALUE  是23.455  这个是不大于 500的   但是实际情况是523  这个时候
         *     已经大于500了  所以之前的是存在bug的   这个要进行修正 也就是拿到的比较数应该是523.45  而不是23.455
         *     所以有了下面的分隔  也就是  把23.45  (因为这个时候dstart=0)  分隔成 ""  和23.45  然后把  5放到中间
         *     进行拼接 也就是  "" + 5 + 23.45  也就是523.45  然后在进行和500比较
         *     还有一个比较明显的就是   23.45   这个时候光标在2和3 之间  那么如果修正之前  是23.455   修正之后  dstart = 1
         *     这个时候分隔是 "2"  "3.45"   这个时候拼接是253.45  然后和500比较  以此类推
         * </>
         */
        String first = destText.substring(0, dstart);

        String second = destText.substring(dstart, destText.length());
//        dend
        String sum = first + sourceText + second;
        String original = sum;
        sum = new BigDecimal(sum).add(new BigDecimal("0")).toString();
        //验证输入金额的大小
        //如果输入的金额小于事先规定的金额
        //这里得到输入完之后需要计算的金额  如果这个金额大于了事先设定的金额,那么久直接返回  不需要加入输入的字符
        if (new BigDecimal(sum).compareTo(new BigDecimal(MAX_VALUE)) > 0) {
            ToastCompat.show("金额超出限制！");
            return dest.subSequence(dstart, dend);
        }
        if (original.indexOf("0") == 0 && (dstart <= original.lastIndexOf(POINTER) || original.lastIndexOf(POINTER) == -1)) {
            if ("0".equals(source)) {
                return "";
            }
        }
//        if (source.toString().equals("0")
//                && end == 1 && dstart < original.lastIndexOf(POINTER)) {
//             return "";
//        }
        return dest.subSequence(dstart, dend) + sourceText;
    }

    public EditInputFilter(EditText editText, String MAX, String random) {
        MAX_VALUE = MAX;
        editText.setTag(R.id.tagEditInputFilter, random);
        editText.addTextChangedListener(new TextWatcher() {
            @Override
            public void beforeTextChanged(CharSequence charSequence, int i, int i1, int i2) {

            }

            @Override
            public void onTextChanged(CharSequence charSequence, int i, int i1, int i2) {
//                System.out.println(i + "-" + i1 + "-" + i2);
                String now = charSequence.toString();
                if (now.equals(text)) {
                    return;
                }
                String fuhao = "";
                if (now.startsWith("-")) {
                    fuhao = "-";
                    now = now.substring(1);
                }
                if (now.startsWith("+")) {
                    fuhao = "+";
                    now = now.substring(1);
                }
                if (now.equals(".")) {
                    text = fuhao + "0.";
                    editText.setText(fuhao + "0.");
                    editText.setSelection(editText.getText().toString().length());
                    return;
                }
                if (now.startsWith(".")) {
                    text = fuhao + "0" + now;
                    editText.setText(fuhao + "0" + now);
                    editText.setSelection(editText.getText().toString().length());
                    return;
                }
                if (now.startsWith("0") && now.length() > 1) {
                    String str = qu0(now);
                    if (str.length() < now.length()) { //去零成功
                        text = fuhao + str;
                        editText.setText(text);
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                }
                if (!now.isEmpty()) {
                    BigDecimal decimal = new BigDecimal("0").add(new BigDecimal(now));
                    String value = decimal.toString();
//                    System.out.println(text + "====" + value + "====" + now);
                    if (decimal.compareTo(new BigDecimal(MAX_VALUE)) > 0) {
                        ToastCompat.show("金额超出限制！");
                        editText.setText(text);
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                    if (now.contains(".") && now.length() - now.indexOf(".") > 3) {
                        text = fuhao + new BigDecimal(now).setScale(2, BigDecimal.ROUND_DOWN).toString();
                        editText.setText(text);
                        editText.setSelection(editText.getText().toString().length());
                        return;
                    }
                }
                text = charSequence.toString();
            }

            @Override
            public void afterTextChanged(Editable editable) {

            }
        });
    }

    /**
     * 去0
     *
     * @param num
     * @return
     */
    String qu0(String num) {
        if (num != null && num.startsWith("0") && num.indexOf(".") != 1) {
            num = num.substring(1);
            return qu0(num);
        }
        if (TextUtils.isEmpty(num)) {
            num = "0";
        }
        return num;
    }
}
